home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Toolbox / Visual Basic Toolbox (P.I.E.)(1996).ISO / dll_gen / vbdllcom / vbtest.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1995-11-16  |  2.5 KB  |  89 lines
  1. VERSION 2.00
  2. Begin Form frmMain 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   1  'Fixed Single
  5.    Caption         =   "Very special program ;-)"
  6.    ClientHeight    =   1530
  7.    ClientLeft      =   1845
  8.    ClientTop       =   1815
  9.    ClientWidth     =   5805
  10.    Height          =   1935
  11.    Left            =   1785
  12.    LinkTopic       =   "Form1"
  13.    ScaleHeight     =   1530
  14.    ScaleWidth      =   5805
  15.    Top             =   1470
  16.    Width           =   5925
  17.    Begin ComboBox cmb 
  18.       Height          =   300
  19.       Index           =   0
  20.       Left            =   1440
  21.       Style           =   2  'Dropdown List
  22.       TabIndex        =   3
  23.       Top             =   360
  24.       Width           =   855
  25.    End
  26.    Begin CommandButton pb 
  27.       Caption         =   "Try me"
  28.       Height          =   495
  29.       Left            =   240
  30.       TabIndex        =   5
  31.       Top             =   840
  32.       Width           =   1095
  33.    End
  34.    Begin TextBox df 
  35.       Height          =   285
  36.       Index           =   2
  37.       Left            =   3840
  38.       TabIndex        =   2
  39.       Top             =   360
  40.       Width           =   1815
  41.    End
  42.    Begin TextBox df 
  43.       Height          =   285
  44.       Index           =   1
  45.       Left            =   2400
  46.       MaxLength       =   10
  47.       TabIndex        =   1
  48.       Top             =   360
  49.       Width           =   1095
  50.    End
  51.    Begin TextBox df 
  52.       Height          =   285
  53.       Index           =   0
  54.       Left            =   240
  55.       MaxLength       =   10
  56.       TabIndex        =   0
  57.       Top             =   360
  58.       Width           =   1095
  59.    End
  60.    Begin Label Label2 
  61.       BackColor       =   &H000000C0&
  62.       Caption         =   "COUTION I am not shure about every posible reaction and behavior of this program!"
  63.       Height          =   495
  64.       Left            =   1440
  65.       TabIndex        =   6
  66.       Top             =   840
  67.       Width           =   4215
  68.    End
  69.    Begin Label Label1 
  70.       BackColor       =   &H00C0C0C0&
  71.       Caption         =   "="
  72.       Height          =   255
  73.       Index           =   1
  74.       Left            =   3600
  75.       TabIndex        =   4
  76.       Top             =   360
  77.       Width           =   135
  78.    End
  79. Sub Form_Load ()
  80.     cmb(0).AddItem "+"
  81.     cmb(0).AddItem "-"
  82.     cmb(0).AddItem "*"
  83.     cmb(0).AddItem "/"
  84.     cmb(0).ListIndex = 0
  85. End Sub
  86. Sub pb_Click ()
  87.    Call SubCallTestFunction(Me)
  88. End Sub
  89.